brasil_italia <- dados_covid %>%
select(Date_reported, Country,New_cases, New_deaths) %>% #
filter(Country=="Brazil"|Country=="Italy",
New_cases >15000,
New_deaths<30 )
brasil_italia Date_reported Country New_cases New_deaths
1 2022-06-06 Brazil 15590 26
2 2022-08-02 Brazil 20313 28
3 2022-05-30 Italy 15136 27
4 2022-06-06 Italy 15522 27
5 2022-06-13 Italy 19310 26
6 2022-06-20 Italy 34255 18
7 2022-09-11 Italy 15563 18
8 2022-09-26 Italy 18794 13
9 2022-10-03 Italy 28906 20